|
DraftSight 2D : Lisp Datei elemente erzeugen
marcel3 am 24.04.2017 um 16:17 Uhr (1)
Hallo zusammenich beschäftige ich mich gerad damit ein kleines Lisp Programm zu erstellen.Das Programm soll Kreise mit einem Achsenkreuz erstellen und am Schluss diese neu erstellte Geometrie in einen Block zusammenfassen.Der Teil die Kreise erstellen ist soweit gegangen.Hier mein bisheriger Code: (Linienart Center muss vorhanden sein)Code:(defun c:Krlu ()(setq p1 (getpoint "punkt angeben:"))(setq v1 (getreal "durchmesser angeben:"))(setq x (car p1))(setq y (cadr p1))(setq v2 (+ 2 (/ v1 2)))(setq v3 0.0)(s ...
|
| In das Form DraftSight 2D wechseln |
|
DraftSight 2D : Lisp Datei elemente erzeugen
marcel3 am 24.04.2017 um 17:09 Uhr (1)
Hallo cadffmdanke für die Antwort.Der Hintergrund meiner Aufgabenstellung ist folgende:Ich benötige viel Kreis mit unterschiedlichem Durchmesser diean einem durch den User bestimmten Einfügepunkt positioniert werden. Am besten als Block definiert und auf vorgegebenen Layer.Wie würde das "professionell" gemacht?Später möchte ich evt. noch weitere Formen z.B Rechteck auf gleiche weise erstellen können.habe die Variable mit dem Wert 5 getestet, der Kreis bekommt einen Durchmesser von 5. Danke für den Hinweis, ...
|
| In das Form DraftSight 2D wechseln |
|
DraftSight 2D : Lisp Datei elemente erzeugen
marcel3 am 25.04.2017 um 08:30 Uhr (1)
So nun habe ich dank euch das Programmsoweit fertig.hier einmal der Code, für Verbesserungen und allfällige Hinweiseauf Probleme bin ich weiterhin sehr dankbar.Das Programm wird grundsätzlich für das zeichnen von Rohrleitungen verwendet z.B für Lüftungsanlagen.Deshalb will ich in einem nächsten Schritt noch eines für Rechtecke auf die gleiche Art und Weise erstellen.Code:(defun c:Krlu ()(setq v1 (getreal "durchmesser angeben:"))(setq n1 (getstring "name angeben:"))(setq x 0.0)(setq y 0.0)(setq v2 (* 1.1 (/ ...
|
| In das Form DraftSight 2D wechseln |
 |
DraftSight 2D : Flächenberechnung in Text
marcel3 am 01.05.2017 um 10:43 Uhr (15)
Hallo,gibt es evt. von jemandem ein Lisp Programmwelches die Fläche einer Polyline oder Schraffur in einTextfeld ausgibt.Beispiel für ACAD: http://www.lee-mac.com/areastofield.htmlIch habe leider keinen Ansatz, wie ich ein Feld in DS per Befehlszeile mit der Flächenangabe einfügen kann, um damit ein LISP-Command zu erstellen.Für die Hilfe bin ich euch dankbar.------------------Gruss marcel[Diese Nachricht wurde von marcel3 am 01. Mai. 2017 editiert.]
|
| In das Form DraftSight 2D wechseln |
 |
DraftSight 2D : Flächenberechnung in Text
marcel3 am 01.05.2017 um 14:30 Uhr (1)
doch, wie ich ein Lisp starte ist kein Problem.nach dem laden der Applikation gebe ich txt2atta ein.ich kann danach aber weder einen Text noch ein Element auswählen(siehe Anhang). Da verstehe ich nicht wies geht, bzw. was klemmt.------------------Gruss marcel
|
| In das Form DraftSight 2D wechseln |
